home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / eulisp / you-075a.lha / you-075a / modboot.h < prev    next >
C/C++ Source or Header  |  1992-06-18  |  2KB  |  54 lines
  1. #ifndef MODBOOT_H
  2. #define MODBOOT_H
  3. extern void open_module(LispObject *,MODULE *,LispObject *,char *,int);
  4. extern void close_module(void);
  5. extern LispObject make_module_function(LispObject *,char *,
  6.                        LispObject (*)(LispObject*),int);
  7. extern LispObject make_unexported_module_function(LispObject *,
  8.                           char *, LispObject (*)(LispObject *),
  9.                           int);
  10. extern LispObject make_unexported_module_special(
  11.                LispObject *,char *,LispObject (*)(LispObject *));
  12. extern LispObject make_module_special(LispObject *,
  13.                       char *,LispObject (*)(LispObject *));
  14. extern LispObject make_module_entry(LispObject *,char *,LispObject);
  15. extern LispObject make_module_entry_using_symbol(LispObject *,LispObject,LispObject);
  16.  
  17. extern LispObject make_module_generic(LispObject *,char *,int);
  18. extern LispObject make_wrapped_module_generic(
  19.              LispObject *, char *,int,LispObject (*)(LispObject *));
  20. extern LispObject make_module_method_1(LispObject *,
  21.               LispObject,LispObject (*)(LispObject *),LispObject);
  22. extern LispObject make_module_method_2(LispObject *,
  23.                        LispObject,LispObject (*)(LispObject *),
  24.                        LispObject,LispObject);
  25.  
  26. extern LispObject make_unexported_function(LispObject *, char *,
  27.                        LispObject (*)(LispObject *),int);
  28. #ifdef Obsolete
  29. extern LispObject make_method_1(LispObject,
  30.                 LispObject (*)(LispObject *),LispObject);
  31. extern LispObject make_method_2(LispObject,LispObject (*)(LispObject *),
  32.                 LispObject,LispObject);
  33. #endif
  34.  
  35. extern 
  36.   LispObject 
  37.     make_anonymous_module_env_function_2(LispObject *,LispObject,
  38.                      LispObject (*)(LispObject *),
  39.                      int,LispObject,LispObject,
  40.                      LispObject,LispObject);
  41.  
  42. extern 
  43.   LispObject 
  44.     make_anonymous_module_env_function_1(LispObject *,LispObject,
  45.                      LispObject (*)(LispObject *),
  46.                      int,LispObject,LispObject);
  47.  
  48. /* Hack!! */
  49.  
  50. extern LispObject make_nary(char *,LispObject (*)(LispObject *),int);
  51.  
  52. extern LispObject make_module_macro(LispObject *,char *,LispObject (*)(LispObject *),int);
  53. #endif
  54.